home *** CD-ROM | disk | FTP | other *** search
/ Bubka 15 / Bubka 15.iso / html / puzzle / 02.dcr / 00003_kansei hantei.ls < prev    next >
Encoding:
Text File  |  2002-07-20  |  161 b   |  11 lines

  1. on exitFrame me
  2.   global withlist
  3.   repeat with i = 1 to 30
  4.     x = x + getAt(withlist, i)
  5.   end repeat
  6.   if x = 30 then
  7.     go(46)
  8.   end if
  9.   go(the frame)
  10. end
  11.